home *** CD-ROM | disk | FTP | other *** search
/ Delphi Magazine Collection 2001 / Delphi Magazine Collection 20001 (2001).iso / Bonus / VCLZip / kpdemosd.exe / ZipUtil / Proj_16 / ZIPP.DPR next >
Encoding:
Text File  |  1998-01-06  |  1.0 KB  |  32 lines

  1. program zipp;
  2.  
  3. uses
  4.   Forms,
  5.   zip in '..\ZIP.PAS' {VCLZipForm},
  6.   IncZip in '..\INCZIP.PAS' {IncompleteZipDlg},
  7.   Ovrwrite in '..\OVRWRITE.PAS' {OverwriteDlg},
  8.   Extract in '..\EXTRACT.PAS' {ExtractDlg},
  9.   Compress in '..\COMPRESS.PAS' {CompressDlg},
  10.   Config in '..\CONFIG.PAS' {ConfigDlg},
  11.   Comment in '..\COMMENT.PAS' {CommentEditor},
  12.   ModInfo in '..\MODINFO.PAS' {ModInfoForm},
  13.   InvPwd in '..\INVPWD.PAS' {InvalidPwdDlg};
  14.  
  15. {$R *.RES}
  16.  
  17. begin
  18.     {$IFDEF WIN32}
  19.     Application.Initialize;
  20.     {$ENDIF}
  21.   Application.Title := 'VCLZip Zip Utility';
  22.   Application.CreateForm(TVCLZipForm, VCLZipForm);
  23.   Application.CreateForm(TOverwriteDlg, OverwriteDlg);
  24.   Application.CreateForm(TExtractDlg, ExtractDlg);
  25.   Application.CreateForm(TCompressDlg, CompressDlg);
  26.   Application.CreateForm(TConfigDlg, ConfigDlg);
  27.   Application.CreateForm(TCommentEditor, CommentEditor);
  28.   Application.CreateForm(TModInfoForm, ModInfoForm);
  29.   Application.CreateForm(TInvalidPwdDlg, InvalidPwdDlg);
  30.   Application.Run;
  31. end.
  32.